
Name=Dragon
hp=200
attack=19
defense=15
exp=0
gold=0
description=The Dragon is a fearsome beast with leathery skin, giant wings, \
and breath of fire.  It will protect its hoard of gold and treasure at any \
cost, attacking anyone who approaches too near.

:on_death
#Give the player one of the dragon items.
if is_equipped Dragon Breastplate | pass | info You create a Dragon \
Breastplate out of the remains of the Dragon!
if is_equipped Dragon Breastplate | pass | item Dragon Breastplate
if is_equipped Dragon Breastplate | pass | end
if is_equipped Dragon Helm | pass | info You create a Dragon \
Helm out of the remains of the Dragon!
if is_equipped Dragon Helm | pass | item Dragon Helm
if is_equipped Dragon Helm | pass | end


#If the player has both a breastplate and helm, give them a standard reward.
give gold 150
give exp 40
info You find 150 gold,
info and get 40 experience.

#This gives the player a Dragon item 60% of the time upon killing a dragon.
#While it works, it is a bit "unfinished" right now. I need to give more
#power to the "if" command; make it stackable.
#It is provided here as an example.
#set dragon_item = ~rng 50 50~
#info ~var dragon_item~
#if var dragon_item > 35 | item Dragon Breastplate | pass
#if var dragon_item > 35 | info You found a Dragon Breastplate! | pass
#if var dragon_item > 35 | end | pass
#if var dragon_item > 20 | item Dragon Helm | pass
#if var dragon_item > 20 | info You found a Dragon Helm! | pass
#if var dragon_item > 20 | end | pass
